home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / progtool / c / gcc / crssrc16.zoo / src / fgetlr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-09-27  |  2.7 KB  |  117 lines
  1. /************************************************************************
  2.  *                                    *
  3.  *            Copyright (c) 1982, Fred Fish            *
  4.  *                All Rights Reserved                *
  5.  *                                    *
  6.  *    This software and/or documentation is released for public    *
  7.  *    distribution for personal, non-commercial use only.        *
  8.  *    Limited rights to use, modify, and redistribute are hereby    *
  9.  *    granted for non-commercial purposes, provided that all        *
  10.  *    copyright notices remain intact and all changes are clearly    *
  11.  *    documented.  The author makes no warranty of any kind with    *
  12.  *    respect to this product and explicitly disclaims any implied    *
  13.  *    warranties of merchantability or fitness for any particular    *
  14.  *    purpose.                            *
  15.  *                                    *
  16.  ************************************************************************
  17.  */
  18.  
  19.  
  20. /*
  21.  *  LIBRARY FUNCTION
  22.  *
  23.  *    fgetlr    get logical record from a file
  24.  *
  25.  *  KEY WORDS
  26.  *
  27.  *    fgetlr
  28.  *    string functions
  29.  *
  30.  *  SYNOPSIS
  31.  *
  32.  *    char *fgetlr(bp,bpsize,fp)
  33.  *    char *bp;
  34.  *    int bpsize;
  35.  *    FILE *fp;
  36.  *
  37.  *  DESCRIPTION
  38.  *
  39.  *    Reads the next logical record from stream "fp" into buffer "bp"
  40.  *    until next unescaped newline, "bpsize" minus one characters
  41.  *    have been read, end of file, or read error.
  42.  *    The last character read is followed by a NULL.
  43.  *
  44.  *    A logical record may span several physical records by having
  45.  *    each newline escaped with the standard C escape character
  46.  *    (backslash).
  47.  *
  48.  *    This is particularly useful for things like the termcap
  49.  *    file, where a single entry is too long for one physical
  50.  *    line, yet needs to be treated as a single record.
  51.  *
  52.  *    Returns its first argument unless an end of file or read
  53.  *    error occurs prior to any characters being read.
  54.  *
  55.  *  BUGS
  56.  *
  57.  *    The only way to know if read was terminated due to buffer size
  58.  *    limitation is to test for a newline before the terminating
  59.  *    null.
  60.  *
  61.  */
  62.  
  63. #include <stdio.h>
  64. #include <string.h>
  65. #include <termcap.h>
  66.  
  67. #ifndef _COMPILER_H
  68. #  include <compiler.h>
  69. #endif
  70.  
  71.  
  72. /*
  73.  *  PSEUDO CODE
  74.  *
  75.  *    Begin fgetlr
  76.  *        If read fails then
  77.  *        Return NULL.
  78.  *        Else
  79.  *        Find out how many characters were read.
  80.  *        Initialize pointer to terminating null.
  81.  *        If last char read was newline then
  82.  *            If newline was escaped then
  83.  *            Replace backslash with the newline.
  84.  *            Replace newline with null.
  85.  *            Read and append more.
  86.  *            End if
  87.  *        End if
  88.  *        Return buffer pointer.
  89.  *        End if
  90.  *    End fgetlr
  91.  *
  92.  */
  93.  
  94. char *fgetlr(bp,bpsize,fp)
  95. char *bp;
  96. int bpsize;
  97. FILE *fp;
  98. {
  99.     int numch;
  100.     char *cp;
  101.  
  102.     if (fgets(bp,bpsize,fp) == NULL) {
  103.     return(NULL);
  104.     } else {
  105.     numch = (int)strlen(bp);
  106.     cp = &bp[numch];
  107.     if (*--cp == '\n') {
  108.         if (numch > 1 && *--cp == '\\') {
  109.         *cp++ = '\n';
  110.         *cp = '\0';
  111.         fgetlr(cp,bpsize-numch+1,fp);
  112.         }
  113.     }
  114.     return(bp);
  115.     }
  116. }
  117.